[@main]
Hi!, You may know my name but its CowBell! I have had my power's\
upgraded and can now issue you with a rentable slave or if you\
like i can convert your Mir and Heaven Armours, what will it be?\  \
<Rent a slave/@rentaslave> -- Fee <100,000> per slave!\
<Convert armour/@main1> -- Fee <50,000> per armour!\
<exit/@exit>

[@oldone]
Hello <$USERNAME>, my name is CowBell! I can convert, upgrade and\
downgrade your special armours for you! But my fee for each little\
service is <50,000 gold> , i am unable to do it for less forthe reasons \
that i cannot explain! Good luck!.\
\  \
<Show me the options!!!/@main1>\
<exit/@exit>

[@main1]
<Convert Heaven Armour/@heaven> - Turn it to a wearable item!\
<Convert Mir Armour/@mir> - Turn it to a wearable item!\
<Upgrade Heaven Armour/@heavenupgrade> - Level Higher? Higher Stats!\
<Upgrade Mir Armour/@mirupgrade> - Level Higher? Higher Stats!\
<Downgrade Heaven Armour/@heavendowngrade> - Level too high? Downgrade!\
<Downgrade Mir Armour/@mirdowngrade> - Level too high? Downgrade!\
<**Each convert or upgrade can only be done once per person!>\
<exit/@exit>\

[@notforyou]
I am sorry, but you dont have any armours.\
<exit/@exit>

[@convert]
Sadly, you cannot convert again, this is a security check.\
<exit/@exit>

[@doneupgrade]
Your item has been upgraded!\
<exit/@exit>

[@upgraderrror]
Sorry, but that will not work!\
<exit/@exit>

[@heaven]
#IF
	gender man
	checkitem HeavenArmourM 1
	checklevelex > 49
#ACT
	goto @level50m
	BREAK

#IF
	gender man
	checkitem HeavenArmourM 1
	checklevelex > 39
#ACT
	goto @level40m
	BREAK

#IF
	gender man
	checkitem HeavenArmourM 1
	checklevelex > 29
#ACT
	goto @level30m
	BREAK

#IF
	gender man
	checkitem HeavenArmourM 1
	checklevelex > 19
#ACT
	goto @level20m
	BREAK

#IF
	gender man
#ACT
	goto @notforyou
	BREAK

#ELSEACT
	goto @heavenwomen

[@heavenwomen]
#IF
	checkitem HeavenArmourF 1
	checklevelex > 49
#ACT
	goto @level50f
	BREAK

#IF
	checkitem HeavenArmourF 1
	checklevelex > 39
#ACT
	goto @level40f
	BREAK

#IF
	checkitem HeavenArmourF 1
	checklevelex > 29
#ACT
	goto @level30f
	BREAK

#IF
	checkitem HeavenArmourF 1
	checklevelex > 19
#ACT
	goto @level20f
	BREAK

#ELSEACT
	goto @notforyou

[@Mir]
#IF
	gender man
	checkitem MirArmour(M) 1
	checklevelex > 49
#ACT
	goto @mlevel50m
	BREAK

#IF
	gender man
	checkitem MirArmour(M) 1
	checklevelex > 39
#ACT
	goto @mlevel40m
	BREAK

#IF
	gender man
	checkitem MirArmour(M) 1
	checklevelex > 29
#ACT
	goto @mlevel30m
	BREAK

#IF
	gender man
	checkitem MirArmour(M) 1
	checklevelex > 19
#ACT
	goto @mlevel20m
	BREAK

#IF
	gender man
#ACT
	goto @notforyou
	BREAK

#ELSEACT
	goto @Mirwomen

[@Mirwomen]
#IF
	checkitem MirArmour(F) 1
	checklevelex > 49
#ACT
	goto @mlevel50f
	BREAK

#IF
	checkitem MirArmour(F) 1
	checklevelex > 39
#ACT
	goto @mlevel40f
	BREAK

#IF
	checkitem MirArmour(F) 1
	checklevelex > 29
#ACT
	goto @mlevel30f
	BREAK

#IF
	checkitem MirArmour(F) 1
	checklevelex > 19
#ACT
	goto @mlevel20f
	BREAK

#ELSEACT
	goto @notforyou


[@level50m]
#IF
	checknamelist ../Convert/HeavenArmourM50.txt
#ACT
	goto @convert
	BREAK

#IF
	checkgold 50000
#ACT
	take HeavenArmourM
	take gold 50000
	give HeavenArm(M)50
	addnamelist ../Convert/HeavenArmourM50.txt
	BREAK

#SAY
	Enjoy! Your item has been converted!\
	<exit/@exit>
#ELSESAY
	Sadly, there is an error, try having the correct gold.\
	<exit/@exit>
	

[@level50f]
#IF
	checknamelist ../Convert/HeavenArmourF50.txt
#ACT
	goto @convert
	BREAK
#IF
	checkgold 50000
#ACT
	take HeavenArmourF
	take gold 50000
	give HeavenArm(F)50
	addnamelist ../Convert/HeavenArmourF50.txt
	BREAK

#SAY
	Enjoy! Your item has been converted!\
	<exit/@exit>
#ELSESAY
	Sadly, there is an error, try having the correct gold.\
	<exit/@exit>

[@level40m]
#IF
	checknamelist ../Convert/HeavenArmourM40.txt
#ACT
	goto @convert
	BREAK
#IF
	checkgold 50000
#ACT
	take HeavenArmourM
	take gold 50000
	give HeavenArm(M)40
	addnamelist ../Convert/HeavenArmourM40.txt
	BREAK

#SAY
	Enjoy! Your item has been converted!\
	<exit/@exit>
#ELSESAY
	Sadly, there is an error, try having the correct gold.\
	<exit/@exit>

[@level40f]
#IF
	checknamelist ../Convert/HeavenArmourF40.txt
#ACT
	goto @convert
	BREAK
#IF
	checkgold 50000
#ACT
	take HeavenArmourF
	take gold 50000
	give HeavenArm(F)40
	addnamelist ../Convert/HeavenArmourF40.txt
	BREAK

#SAY
	Enjoy! Your item has been converted!\
	<exit/@exit>
#ELSESAY
	Sadly, there is an error, try having the correct gold.\
	<exit/@exit>

[@level30m]
#IF
	checknamelist ../Convert/HeavenArmourM30.txt
#ACT
	goto @convert
	BREAK
#IF
	checkgold 50000
#ACT
	take HeavenArmourM
	take gold 50000
	give HeavenArm(M)30
	addnamelist ../Convert/HeavenArmourM30.txt
	BREAK

#SAY
	Enjoy! Your item has been converted!\
	<exit/@exit>
#ELSESAY
	Sadly, there is an error, try having the correct gold.\
	<exit/@exit>

[@level30f]
#IF
	checknamelist ../Convert/HeavenArmourF30.txt
#ACT
	goto @convert
	BREAK
#IF
	checkgold 50000
#ACT
	take HeavenArmourF
	take gold 50000
	give HeavenArm(F)30
	addnamelist ../Convert/HeavenArmourF30.txt
	BREAK

#SAY
	Enjoy! Your item has been converted!\
	<exit/@exit>
#ELSESAY
	Sadly, there is an error, try having the correct gold.\
	<exit/@exit>


[@level20m]
#IF
	checknamelist ../Convert/HeavenArmourM20.txt
#ACT
	goto @convert
	BREAK
#IF
	checkgold 50000
#ACT
	take HeavenArmourM
	take gold 50000
	give HeavenArm(M)20
	addnamelist ../Convert/HeavenArmourM20.txt
	BREAK

#SAY
	Enjoy! Your item has been converted!\
	<exit/@exit>
#ELSESAY
	Sadly, there is an error, try having the correct gold.\
	<exit/@exit>


[@level20f]
#IF
	checknamelist ../Convert/HeavenArmourF20.txt
#ACT
	goto @convert
	BREAK
#IF
	checkgold 50000
#ACT
	take HeavenArmourF
	take gold 50000
	give HeavenArm(F)20
	addnamelist ../Convert/HeavenArmourF20.txt
	BREAK

#SAY
	Enjoy! Your item has been converted!\
	<exit/@exit>
#ELSESAY
	Sadly, there is an error, try having the correct gold.\
	<exit/@exit>

[@mlevel50m]
#IF
	checknamelist ../Convert/MirArmourM50.txt
#ACT
	goto @convert
	BREAK
#IF
	checkgold 50000
#ACT
	take MirArmour(M)
	take gold 50000
	give MirArmour(M)50
	addnamelist ../Convert/MirArmourM50.txt
	BREAK

#SAY
	Enjoy! Your item has been converted!\
	<exit/@exit>
#ELSESAY
	Sadly, there is an error, try having the correct gold.\
	<exit/@exit>


[@mlevel50f]
#IF
	checknamelist ../Convert/MirArmourF50.txt
#ACT
	goto @convert
	BREAK
#IF
	checkgold 50000
#ACT
	take MirArmour(F)
	take gold 50000
	give MirArmour(F)50
	addnamelist ../Convert/MirArmourF50.txt
	BREAK

#SAY
	Enjoy! Your item has been converted!\
	<exit/@exit>
#ELSESAY
	Sadly, there is an error, try having the correct gold.\
	<exit/@exit>

[@mlevel40m]
#IF
	checknamelist ../Convert/MirArmourM40.txt
#ACT
	goto @convert
	BREAK
#IF
	checkgold 50000
#ACT
	take MirArmour(M)
	take gold 50000
	give MirArmour(M)40
	addnamelist ../Convert/MirArmourM40.txt
	BREAK

#SAY
	Enjoy! Your item has been converted!\
	<exit/@exit>
#ELSESAY
	Sadly, there is an error, try having the correct gold.\
	<exit/@exit>

[@mlevel40f]
#IF
	checknamelist ../Convert/MirArmourF40.txt
#ACT
	goto @convert
	BREAK
#IF
	checkgold 50000
#ACT
	take MirArmour(F)
	take gold 50000
	give MirArmour(F)40
	addnamelist ../Convert/MirArmourF40.txt
	BREAK

#SAY
	Enjoy! Your item has been converted!\
	<exit/@exit>
#ELSESAY
	Sadly, there is an error, try having the correct gold.\
	<exit/@exit>


[@mlevel30m]
#IF
	checknamelist ../Convert/MirArmourM30.txt
#ACT
	goto @convert
	BREAK
#IF
	checkgold 50000
#ACT
	take MirArmour(M)
	take gold 50000
	give MirArmour(M)30
	addnamelist ../Convert/MirArmourM30.txt
	BREAK

#SAY
	Enjoy! Your item has been converted!\
	<exit/@exit>
#ELSESAY
	Sadly, there is an error, try having the correct gold.\
	<exit/@exit>



[@mlevel30f]
#IF
	checknamelist ../Convert/MirArmourF30.txt
#ACT
	goto @convert
	BREAK
#IF
	checkgold 50000
#ACT
	take MirArmour(F)
	take gold 50000
	give MirArmour(F)30
	addnamelist ../Convert/MirArmourF30.txt
	BREAK

#SAY
	Enjoy! Your item has been converted!\
	<exit/@exit>
#ELSESAY
	Sadly, there is an error, try having the correct gold.\
	<exit/@exit>


[@mlevel20m]
#IF
	checknamelist ../Convert/MirArmourM20.txt
#ACT
	goto @convert
	BREAK
#IF
	checkgold 50000
#ACT
	take MirArmour(M)
	take gold 50000
	give MirArmour(M)20
	addnamelist ../Convert/MirArmourM20.txt
	BREAK
#SAY
	Enjoy! Your item has been converted!\
	<exit/@exit>
#ELSESAY
	Sadly, there is an error, try having the correct gold.\
	<exit/@exit>

[@mlevel20f]
#IF
	checknamelist ../Convert/MirArmourF20.txt
#ACT
	goto @convert
	BREAK
#IF
	checkgold 50000
#ACT
	take MirArmour(F)
	take gold 50000
	give MirArmour(F)20
	addnamelist ../Convert/MirArmourF20.txt
	BREAK

#SAY
	Enjoy! Your item has been converted!\
	<exit/@exit>
#ELSESAY
	Sadly, there is an error, try having the correct gold.\
	<exit/@exit>

[@heavenupgrade]
Are you sure? This cannot be undone!\
<Yes/@heaven1> || <No/@exit>

[@heaven1]
#IF
	gender man
	checkgold 50000
	checklevelex > 49
	checkitem HeavenArm(M)40 1
#ACT
	take HeavenArm(M)40 1
	give HeavenArm(M)50 1
	take gold 50000 1
	goto @doneupgrade
	BREAK

#IF
	gender man
	checkgold 50000
	checklevelex > 39
	checkitem HeavenArm(M)30 1
#ACT
	take HeavenArm(M)30 1
	give HeavenArm(M)40 1
	take gold 50000 1
	goto @doneupgrade
	BREAK

#IF
	gender man
	checkgold 50000
	checklevelex > 29
	checkitem HeavenArm(M)20 1
#ACT
	take HeavenArm(M)20 1
	take gold 50000
	give HeavenArm(M)30 1
	goto @doneupgrade
	BREAK

#ELSEACT
	goto @heaven2

[@heaven2]
#IF
	checklevelex > 49
	checkgold 50000
	checkitem HeavenArm(F)40 1
#ACT
	take HeavenArm(F)40 1
	give HeavenArm(F)50 1
	take gold 50000 1
	goto @doneupgrade
	BREAK

#IF
	checklevelex > 39
	checkgold 50000
	checkitem HeavenArm(F)30 1
#ACT
	take HeavenArm(F)30 1
	give HeavenArm(F)40 1
	take gold 50000 1
	goto @doneupgrade
	BREAK

#IF
	checklevelex > 29
	checkgold 50000
	checkitem HeavenArm(F)20 1
#ACT
	take HeavenArm(F)20 1
	give HeavenArm(F)30 1
	take gold 50000 1
	goto @doneupgrade
	BREAK

#ELSEACT
	goto @upgraderrror

[@upgraderror]
Sorry, but it seems you do not have no armour to upgrade!!!\
<exit/@exit>

[@mirupgrade]
#IF
	gender man
	checkgold 50000
	checklevelex > 49
	checkitem MirArmour(M)40 1
#ACT
	take MirArmour(M)40 1
	give MirArmour(M)50 1
	take gold 50000 1
	goto @doneupgrade
	break

#IF
	gender man
	checkgold 50000
	checklevelex > 39
	checkitem MirArmour(M)30 1
#ACT
	take MirArmour(M)30 1
	give MirArmour(M)40 1
	take gold 50000 1
	goto @doneupgrade
	break

#IF
	gender man
	checkgold 50000
	checklevelex > 29
	checkitem MirArmour(M)20 1
#ACT
	take MirArmour(M)20 1
	give MirArmour(M)30 1
	take gold 50000 1
	goto @doneupgrade
	break

#ELSEACT
	goto @mir2

[@mir2]
#IF
	checklevelex > 49
	checkgold 50000
	checkitem MirArmour(F)40 1
#ACT
	take MirArmour(F)40 1
	give MirArmour(F)50 1
	take gold 50000 1
	goto @doneupgrade
	break

#IF
	checklevelex > 39
	checkgold 50000
	checkitem MirArmour(F)30 1
#ACT
	take MirArmour(F)30 1
	give MirArmour(F)40 1
	take gold 50000 1
	goto @doneupgrade
	break

#IF
	checklevelex > 29
	checkgold 50000
	checkitem MirArmour(F)20 1
#ACT
	take MirArmour(F)20 1
	give MirArmour(F)30 1
	take gold 50000 1
	goto @doneupgrade
	break
#ELSEACT
	goto @upgraderrror

[@heavendowngrade]
#IF
	gender man
	checkgold 50000
	checklevelex > 19
	checkitem HeavenArm(M)30 1
#ACT
	take HeavenArm(M)30 1
	give HeavenArm(M)20 1
	take gold 50000
	BREAK
#SAY
	Your item has been downgraded!\
	<exit/@exit>

#IF
	gender man
	checkgold 50000
	checklevelex > 19
	checkitem HeavenArm(M)40 1
#ACT
	take HeavenArm(M)40 1
	give HeavenArm(M)20 1
	take gold 50000
	BREAK

#SAY
	Your item has been downgraded!\
	<exit/@exit>

#IF
	gender man
	checkgold 50000
	checklevelex > 19
	checkitem HeavenArm(M)50 1
#ACT
	take HeavenArm(M)50 1
	give HeavenArm(M)20 1
	take gold 50000
	BREAK

#SAY
	Your item has been downgraded!\
	<exit/@exit>

#IF
	gender man
	checkgold 50000
	checklevelex > 19
	checkitem HeavenArm(F)30 1
#ACT
	take HeavenArm(F)30 1
	give HeavenArm(F)20 1
	take gold 50000
	BREAK
#SAY
	Your item has been downgraded!\
	<exit/@exit>

#IF
	gender man
	checkgold 50000
	checklevelex > 19
	checkitem HeavenArm(F)40 1
#ACT
	take HeavenArm(F)40 1
	give HeavenArm(F)20 1
	take gold 50000
	BREAK

#SAY
	Your item has been downgraded!\
	<exit/@exit>


[@mirdowngrade]
#IF
	gender man
	checkgold 50000
	checklevelex > 19
	checkitem MirArmour(M)30 1
#ACT
	take MirArmour(M)30 1
	give MirArmour(M)20 1
	take gold 50000
	BREAK
#SAY
	Your item has been downgraded!\
	<exit/@exit>

#IF
	gender man
	checkgold 50000
	checklevelex > 19
	checkitem MirArmour(M)40 1
#ACT
	take MirArmour(M)40 1
	give MirArmour(M)20 1
	take gold 50000
	BREAK

#SAY
	Your item has been downgraded!\
	<exit/@exit>

#IF
	gender man
	checkgold 50000
	checklevelex > 19
	checkitem MirArmour(M)50 1
#ACT
	take MirArmour(M)50 1
	give MirArmour(M)20 1
	take gold 50000
	BREAK

#SAY
	Your item has been downgraded!\
	<exit/@exit>

#IF
	gender man
	checkgold 50000
	checklevelex > 19
	checkitem MirArmour(F)30 1
#ACT
	take MirArmour(F)30 1
	give MirArmour(F)20 1
	take gold 50000
	BREAK
#SAY
	Your item has been downgraded!\
	<exit/@exit>

#IF
	gender man
	checkgold 50000
	checklevelex > 19
	checkitem MirArmour(F)40 1
#ACT
	take MirArmour(F)40 1
	give MirArmour(F)20 1
	take gold 50000
	BREAK

#SAY
	Your item has been downgraded!\
	<exit/@exit>

#IF
	gender man
	checkgold 50000
	checklevelex > 19
	checkitem MirArmour(F)50 1
#ACT
	take MirArmour(F)50 1
	give MirArmour(F)20 1
	take gold 50000
	BREAK

#SAY
	Your item has been downgraded!\
	<exit/@exit>

#ELSESAY
	Sorry sir, but this wont work for you!\
	<exit/@exit>


;;;; ---- rent a slave

[@rentaslave]
<Welcome to rent a slave!>\   \
So you want to rent a slave huh, the benefit of this is that\
there is no level restriction and that you will be given the\
opposite gender to what you are, but dont worry about transfering\
armour, it will automatically change to the correct gender, so\
how may i help you? <100,000 Gold per slave!> one per time!\  
<Rent a slave now!/@rent1> -- <How to use slave/@rent2> -- <exit/@exit>

[@rent1]
#IF
checkgold 100000
#ACT
goto @rent1.1
break
#ELSEACT
sendmsg 6 "Denied, lack of gold"

[@rent1.1]
#IF
gender MAN
#ACT
goto @rent1.2

#ELSEACT
goto @rent1.3

[@rent1.2]
#IF
CHECKSLAVECOUNT < 1
#ACT
take gold 100000
recallmob Rented2
sendmsg 6 "Rented slave issued."
close

#ELSEACT
sendmsg 6 "To many pets"
close

[@rent1.3]
#IF
CHECKSLAVECOUNT < 1
#ACT
take gold 100000
recallmob Rented1
sendmsg 6 "Rented slave issued."
close

#ELSEACT
sendmsg 6 "To many pets"
close